home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Math Factory™ Demo ••••• / Math Factory™ Demo •••••.rsrc / CODE_11.txt < prev    next >
Text File  |  1988-01-30  |  7KB  |  123 lines
  1. # near model CODE resource
  2. # jump table entries: 576-577 (2 of them)
  3. 00000000  0000 0000                ori.b      D0, 0x0
  4. export_72:
  5. 00000004  4E56 FFFC                link       A6, -0x0004
  6. 00000008  2F07                     move.l     -[A7], D7
  7. 0000000A  206E 0008                movea.l    A0, [A6 + 0x8]
  8. 0000000E  3010                     move.w     D0, [A0]
  9. 00000010  5340                     subq.w     D0, 1
  10. 00000012  7201                     moveq.l    D1, 0x01
  11. 00000014  3E00                     move.w     D7, D0
  12. 00000016  9E41                     sub.w      D7, D1
  13. 00000018  6D00 008E                blt        +0x90 /* 000000A8 */
  14. 0000001C  3D41 FFFC                move.w     [A6 - 0x4], D1
  15. label00000020:
  16. 00000020  206E 0008                movea.l    A0, [A6 + 0x8]
  17. 00000024  3010                     move.w     D0, [A0]
  18. 00000026  E548                     lsl        D0.w, 2
  19. 00000028  206E 0008                movea.l    A0, [A6 + 0x8]
  20. 0000002C  3210                     move.w     D1, [A0]
  21. 0000002E  926E FFFC                sub.w      D1, [A6 - 0x4]
  22. 00000032  E549                     lsl        D1.w, 2
  23. 00000034  41ED FC32                lea.l      A0, [A5 - 0x3CE]
  24. 00000038  2430 0000                move.l     D2, [A0 + D0.w]
  25. 0000003C  41ED FC32                lea.l      A0, [A5 - 0x3CE]
  26. 00000040  B4B0 1000                cmp.l      D2, [A0 + D1.w]
  27. 00000044  6600 005A                bne        +0x5C /* 000000A0 */
  28. 00000048  598F                     subq.l     A7, 4
  29. 0000004A  A975                     syscall    TickCount
  30. 0000004C  2B5F FF68                move.l     [A5 - 0x98], [A7]+
  31. 00000050  558F                     subq.l     A7, 2
  32. 00000052  A861                     syscall    Random
  33. 00000054  301F                     move.w     D0, [A7]+
  34. 00000056  4A40                     tst.w      D0
  35. 00000058  6A02                     bpl        +0x4 /* 0000005C */
  36. 0000005A  4440                     neg.w      D0
  37. label0000005C:
  38. 0000005C  206E 000C                movea.l    A0, [A6 + 0xC]
  39. 00000060  3210                     move.w     D1, [A0]
  40. 00000062  206E 0010                movea.l    A0, [A6 + 0x10]
  41. 00000066  9250                     sub.w      D1, [A0]
  42. 00000068  5241                     addq.w     D1, 1
  43. 0000006A  48C0                     ext.l      D0
  44. 0000006C  81C1                     divs.w     D0, D1
  45. 0000006E  4840                     swap.w     D0
  46. 00000070  206E 0010                movea.l    A0, [A6 + 0x10]
  47. 00000074  D050                     add.w      D0, [A0]
  48. 00000076  3D40 FFFE                move.w     [A6 - 0x2], D0
  49. 0000007A  206E 0008                movea.l    A0, [A6 + 0x8]
  50. 0000007E  3010                     move.w     D0, [A0]
  51. 00000080  E548                     lsl        D0.w, 2
  52. 00000082  322E FFFE                move.w     D1, [A6 - 0x2]
  53. 00000086  48C1                     ext.l      D1
  54. 00000088  43ED FC32                lea.l      A1, [A5 - 0x3CE]
  55. 0000008C  2381 0000                move.l     [A1 + D0.w], D1
  56. 00000090  2F2E 0010                move.l     -[A7], [A6 + 0x10]
  57. 00000094  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  58. 00000098  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  59. 0000009C  4EAD 0262                jsr        [A5 + 0x262 /* export_72 */]
  60. label000000A0:
  61. 000000A0  526E FFFC                addq.w     [A6 - 0x4], 1
  62. 000000A4  51CF FF7A                dbf        D7, -0x88 /* 00000020 */
  63. label000000A8:
  64. 000000A8  2E1F                     move.l     D7, [A7]+
  65. 000000AA  4E5E                     unlink     A6
  66. 000000AC  205F                     movea.l    A0, [A7]+
  67. 000000AE  4FEF 000C                lea.l      A7, [A7 + 0xC]
  68. 000000B2  4ED0                     jmp        [A0]
  69. 000000B4  0000 0000                ori.b      D0, 0x0
  70. export_73:
  71. 000000B8  4E56 FFFC                link       A6, -0x0004
  72. 000000BC  2F07                     move.l     -[A7], D7
  73. 000000BE  7001                     moveq.l    D0, 0x01
  74. 000000C0  3E2E 0008                move.w     D7, [A6 + 0x8]
  75. 000000C4  9E40                     sub.w      D7, D0
  76. 000000C6  6D00 0078                blt        +0x7A /* 00000140 */
  77. 000000CA  3D40 FFFC                move.w     [A6 - 0x4], D0
  78. label000000CE:
  79. 000000CE  598F                     subq.l     A7, 4
  80. 000000D0  A975                     syscall    TickCount
  81. 000000D2  2B5F FF68                move.l     [A5 - 0x98], [A7]+
  82. 000000D6  558F                     subq.l     A7, 2
  83. 000000D8  A861                     syscall    Random
  84. 000000DA  301F                     move.w     D0, [A7]+
  85. 000000DC  4A40                     tst.w      D0
  86. 000000DE  6A02                     bpl        +0x4 /* 000000E2 */
  87. 000000E0  4440                     neg.w      D0
  88. label000000E2:
  89. 000000E2  322E 000A                move.w     D1, [A6 + 0xA]
  90. 000000E6  926E 000C                sub.w      D1, [A6 + 0xC]
  91. 000000EA  5241                     addq.w     D1, 1
  92. 000000EC  48C0                     ext.l      D0
  93. 000000EE  81C1                     divs.w     D0, D1
  94. 000000F0  4840                     swap.w     D0
  95. 000000F2  D06E 000C                add.w      D0, [A6 + 0xC]
  96. 000000F6  3D40 FFFE                move.w     [A6 - 0x2], D0
  97. 000000FA  302E FFFC                move.w     D0, [A6 - 0x4]
  98. 000000FE  E548                     lsl        D0.w, 2
  99. 00000100  322E FFFE                move.w     D1, [A6 - 0x2]
  100. 00000104  48C1                     ext.l      D1
  101. 00000106  43ED FC32                lea.l      A1, [A5 - 0x3CE]
  102. 0000010A  2381 0000                move.l     [A1 + D0.w], D1
  103. 0000010E  4A2D E9C9                tst.b      [A5 - 0x1637]
  104. 00000112  6700 0016                beq        +0x18 /* 0000012A */
  105. 00000116  486E 000C                pea.l      [A6 + 0xC]
  106. 0000011A  486E 000A                pea.l      [A6 + 0xA]
  107. 0000011E  486E FFFC                pea.l      [A6 - 0x4]
  108. 00000122  4EAD 0262                jsr        [A5 + 0x262 /* export_72 */]
  109. 00000126  6000 0010                bra        +0x12 /* 00000138 */
  110. label0000012A:
  111. 0000012A  2F3C 0000 0001           move.l     -[A7], 0x1
  112. 00000130  486D FE3A                pea.l      [A5 - 0x1C6]
  113. 00000134  4EAD 00EA                jsr        [A5 + 0xEA /* export_25 */]
  114. label00000138:
  115. 00000138  526E FFFC                addq.w     [A6 - 0x4], 1
  116. 0000013C  51CF FF90                dbf        D7, -0x72 /* 000000CE */
  117. label00000140:
  118. 00000140  2E1F                     move.l     D7, [A7]+
  119. 00000142  4E5E                     unlink     A6
  120. 00000144  205F                     movea.l    A0, [A7]+
  121. 00000146  5C8F                     addq.l     A7, 6
  122. 00000148  4ED0                     jmp        [A0]
  123.